      SUBROUTINE HBBOOK(offset, nabvoff)

      IMPLICIT NONE

      INCLUDE 'hbcomm.inc'
      INCLUDE 'hbtype.inc'

      INTEGER I, J, K, NABVOFF
      INTEGER OFFSET, NUMPAR, CUROFF

c-------------------------------------------------

      IF (OFFSET.eq.0) THEN
         CALL HBOOK1(nabvoff+100,'hb $',150,9.2,10.7,0.)
         CALL HBOOK1(nabvoff+200,'hb $',150,9.2,10.7,0.)
         CALL HBOOK1(nabvoff+220,'hb (at least 1 track |p*| > 2.0 GeV/c)',150,9.2,10.7,0.)
         CALL HBOOK1(nabvoff+225,'hb (at least 1 track |p*| > 2.5 GeV/c)',150,9.2,10.7,0.)
         CALL HBOOK1(nabvoff+230,'hb (at least 1 track |p*| > 3.0 GeV/c)',150,9.2,10.7,0.)
         CALL HBOOK1(nabvoff+235,'hb (at least 1 track |p*| > 3.5 GeV/c)',150,9.2,10.7,0.)
         CALL HBOOK1(nabvoff+240,'hb (at least 1 track |p*| > 4.0 GeV/c)',150,9.2,10.7,0.)
         CALL HBOOK1(nabvoff+245,'hb (at least 1 track |p*| > 4.5 GeV/c)',150,9.2,10.7,0.)
         CALL HBOOK1(nabvoff+250,'hb (at least 1 track |p*| > 5.0 GeV/c)',150,9.2,10.7,0.)

         CALL HBOOK1(nabvoff+300, 'evtR2 $', 1000, 0.0, 1.0, 0.)
         CALL HBOOK1(nabvoff+320,'evtR2 (at least 1 track |p*| > 2.0 GeV/c)',100, 0.0, 1.0, 0.)
         CALL HBOOK1(nabvoff+325,'evtR2 (at least 1 track |p*| > 2.5 GeV/c)',100, 0.0, 1.0, 0.)
         CALL HBOOK1(nabvoff+330,'evtR2 (at least 1 track |p*| > 3.0 GeV/c)',100, 0.0, 1.0, 0.)
         CALL HBOOK1(nabvoff+335,'evtR2 (at least 1 track |p*| > 3.5 GeV/c)',100, 0.0, 1.0, 0.)
         CALL HBOOK1(nabvoff+340,'evtR2 (at least 1 track |p*| > 4.0 GeV/c)',100, 0.0, 1.0, 0.)
         CALL HBOOK1(nabvoff+345,'evtR2 (at least 1 track |p*| > 4.5 GeV/c)',100, 0.0, 1.0, 0.)
         CALL HBOOK1(nabvoff+350,'evtR2 (at least 1 track |p*| > 5.0 GeV/c)',100, 0.0, 1.0, 0.)

         CALL HBOOK2(nabvoff+50, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)
         CALL HBOOK2(nabvoff+51, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)
         CALL HBOOK2(nabvoff+52, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)
         CALL HBOOK2(nabvoff+53, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)

         CALL HBOOK2(nabvoff+60, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+61, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+62, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+63, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)

         CALL HBOOK2(nabvoff+70, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+71, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+72, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+73, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)

         CALL HBOOK2(nabvoff+80, 'recmg2pi-recm2pi+9.8991 vs recm2pi', 160, 9.7, 10.5, 300, 9.2, 10.5, 0.)
         CALL HBOOK2(nabvoff+81, 'recmg2pi-recm2pi+9.8991 vs recm2pi', 160, 9.7, 10.5, 300, 9.2, 10.5, 0.)
         CALL HBOOK2(nabvoff+82, 'recmg2pi-recm2pi+9.8991 vs recm2pi', 160, 9.7, 10.5, 300, 9.2, 10.5, 0.)
         CALL HBOOK2(nabvoff+83, 'recmg2pi-recm2pi+9.8991 vs recm2pi', 160, 9.7, 10.5, 300, 9.2, 10.5, 0.)

         CALL HBOOK2(nabvoff+90, 'recmg2pi-recm2pi+9.8991 vs m2pi', 100, 0.1, 1.1, 300, 9.2, 10.5, 0.)
         CALL HBOOK2(nabvoff+91, 'recmg2pi-recm2pi+9.8991 vs m2pi', 100, 0.1, 1.1, 300, 9.2, 10.5, 0.)
         CALL HBOOK2(nabvoff+92, 'recmg2pi-recm2pi+9.8991 vs m2pi', 100, 0.1, 1.1, 300, 9.2, 10.5, 0.)
         CALL HBOOK2(nabvoff+93, 'recmg2pi-recm2pi+9.8991 vs m2pi', 100, 0.1, 1.1, 300, 9.2, 10.5, 0.)

         CALL HBOOK2(nabvoff+20, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)
         CALL HBOOK2(nabvoff+21, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)
         CALL HBOOK2(nabvoff+22, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)
         CALL HBOOK2(nabvoff+23, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)

         CALL HBOOK2(nabvoff+30, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+31, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+32, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+33, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)

         CALL HBOOK2(nabvoff+40, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+41, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+42, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+43, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)

         CALL HBOOK2(nabvoff+150, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)
         CALL HBOOK2(nabvoff+151, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)
         CALL HBOOK2(nabvoff+152, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)
         CALL HBOOK2(nabvoff+153, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)

         CALL HBOOK2(nabvoff+160, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+161, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+162, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+163, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)

         CALL HBOOK2(nabvoff+170, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+171, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+172, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+173, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)

         CALL HBOOK2(nabvoff+180, 'recmg2pi-recm2pi+9.8991 vs recm2pi', 260, 9.2, 10.5, 260, 9.2, 10.5, 0.)
         CALL HBOOK2(nabvoff+181, 'recmg2pi-recm2pi+9.8991 vs recm2pi', 260, 9.2, 10.5, 260, 9.2, 10.5, 0.)
         CALL HBOOK2(nabvoff+182, 'recmg2pi-recm2pi+9.8991 vs recm2pi', 260, 9.2, 10.5, 260, 9.2, 10.5, 0.)
         CALL HBOOK2(nabvoff+183, 'recmg2pi-recm2pi+9.8991 vs recm2pi', 260, 9.2, 10.5, 260, 9.2, 10.5, 0.)

         CALL HBOOK2(nabvoff+190, 'recmg2pi-recm2pi+9.8991 vs m2pi', 100, 0.1, 1.1, 300, 9.2, 10.5, 0.)
         CALL HBOOK2(nabvoff+191, 'recmg2pi-recm2pi+9.8991 vs m2pi', 100, 0.1, 1.1, 300, 9.2, 10.5, 0.)
         CALL HBOOK2(nabvoff+192, 'recmg2pi-recm2pi+9.8991 vs m2pi', 100, 0.1, 1.1, 300, 9.2, 10.5, 0.)
         CALL HBOOK2(nabvoff+193, 'recmg2pi-recm2pi+9.8991 vs m2pi', 100, 0.1, 1.1, 300, 9.2, 10.5, 0.)

         CALL HBOOK2(nabvoff+120, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)
         CALL HBOOK2(nabvoff+121, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)
         CALL HBOOK2(nabvoff+122, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)
         CALL HBOOK2(nabvoff+123, 'hb vs Eg', 160, 9.7, 10.5, 100, 0.1, 1.1, 0.)

         CALL HBOOK2(nabvoff+130, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+131, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+132, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+133, 'hb vs ks', 160, 9.7, 10.5, 100, 0.45, 0.55, 0.)

         CALL HBOOK2(nabvoff+140, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+141, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+142, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)
         CALL HBOOK2(nabvoff+143, 'Eg vs ks', 100, 0.1, 1.1, 100, 0.45, 0.55, 0.)
      ENDIF
      



      IF (OFFSET.LT.10000) THEN
         CALL HBOOK1(nabvoff+1011+offset,'egboost $',200,.375,.575,0.)
         CALL HBOOK1(nabvoff+1012+offset,'egboost $',200,.375,.575,0.)
         CALL HBOOK1(nabvoff+1013+offset,'egboost $',200,.375,.575,0.)
      ELSEIF (OFFSET.LT.20000) THEN
         CALL HBOOK1(nabvoff+1011+offset,'egboost $',250,.675,.925,0.)
         CALL HBOOK1(nabvoff+1012+offset,'egboost $',250,.675,.925,0.)
         CALL HBOOK1(nabvoff+1013+offset,'egboost $',250,.675,.925,0.)
      ELSE
         CALL HBOOK1(nabvoff+1011+offset,'egboost $',200,.150,.350,0.)
         CALL HBOOK1(nabvoff+1012+offset,'egboost $',200,.150,.350,0.)
         CALL HBOOK1(nabvoff+1013+offset,'egboost $',200,.150,.350,0.)
      ENDIF

         CALL HBOOK1(nabvoff+1000+offset,'recm2pi $',1000,9.7,10.7,0.)
         CALL HBOOK1(nabvoff+1001+offset,'recm2pi $',1000,9.7,10.7,0.)
         CALL HBOOK1(nabvoff+1002+offset,'recm2pi $',1000,9.7,10.7,0.)
         CALL HBOOK1(nabvoff+1003+offset,'recm2pi $',1000,9.7,10.7,0.)
c     CALL HBOOK1(nabvoff+1002+offset,'recmg2pi $',1200,9.1,10.3,0.)
c     CALL HBOOK1(nabvoff+1003+offset,'recm2pi-recmg2pi $',1000,0,1,0.)
         CALL HBOOK1(nabvoff+1021+offset,'DeltaMpipig',1500,9.2,10.7,0.)
         CALL HBOOK1(nabvoff+1022+offset,'DeltaMpipig',1500,9.2,10.7,0.)
         CALL HBOOK1(nabvoff+1023+offset,'DeltaMpipig',1500,9.2,10.7,0.)


         goto 78
         
      CALL HBOOK1(nabvoff+1001+offset,'egboost $',200,.375,.575,0.)
      CALL HBOOK1(nabvoff+1011+offset,'egboost $',200,.375,.575,0.)
      CALL HBOOK1(nabvoff+1012+offset,'egboost $',200,.375,.575,0.)
      CALL HBOOK1(nabvoff+1013+offset,'egboost $',200,.375,.575,0.)
      CALL HBOOK1(nabvoff+1000+offset,'recm2pi $',1000,9.7,10.7,0.)
      CALL HBOOK1(nabvoff+1002+offset,'recmg2pi $',1200,9.1,10.3,0.)
      CALL HBOOK1(nabvoff+1003+offset,'recm2pi-recmg2pi $',1000,0,1,0.)
      CALL HBOOK1(nabvoff+1021+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1022+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1023+offset,'DeltaMpipig',1500,9.2,10.7,0.)


      offset = curoff + 2000

      CALL HBOOK1(nabvoff+1001+offset,'egboost $',200,.375,.575,0.)
      CALL HBOOK1(nabvoff+1011+offset,'egboost $',200,.375,.575,0.)
      CALL HBOOK1(nabvoff+1012+offset,'egboost $',200,.375,.575,0.)
      CALL HBOOK1(nabvoff+1013+offset,'egboost $',200,.375,.575,0.)
      CALL HBOOK1(nabvoff+1000+offset,'recm2pi $',1000,9.7,10.7,0.)
      CALL HBOOK1(nabvoff+1002+offset,'recmg2pi $',1200,9.1,10.3,0.)
      CALL HBOOK1(nabvoff+1003+offset,'recm2pi-recmg2pi $',1000,0,1,0.)
      CALL HBOOK1(nabvoff+1021+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1022+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1023+offset,'DeltaMpipig',1500,9.2,10.7,0.)

      offset = curoff + 3000

      CALL HBOOK1(nabvoff+1001+offset,'egboost $',200,.375,.575,0.)
      CALL HBOOK1(nabvoff+1011+offset,'egboost $',200,.375,.575,0.)
      CALL HBOOK1(nabvoff+1012+offset,'egboost $',200,.375,.575,0.)
      CALL HBOOK1(nabvoff+1013+offset,'egboost $',200,.375,.575,0.)
      CALL HBOOK1(nabvoff+1000+offset,'recm2pi $',1000,9.7,10.7,0.)
      CALL HBOOK1(nabvoff+1002+offset,'recmg2pi $',1200,9.1,10.3,0.)
      CALL HBOOK1(nabvoff+1003+offset,'recm2pi-recmg2pi $',1000,0,1,0.)
      CALL HBOOK1(nabvoff+1021+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1022+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1023+offset,'DeltaMpipig',1500,9.2,10.7,0.)


c     2P -> 1 S

      offset = curoff + 10000

      CALL HBOOK1(nabvoff+1001+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1011+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1012+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1013+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1000+offset,'recm2pi $',1000,9.7,10.7,0.)
      CALL HBOOK1(nabvoff+1002+offset,'recmg2pi $',1200,9.1,10.3,0.)
      CALL HBOOK1(nabvoff+1003+offset,'recm2pi-recmg2pi $',1000,0,1,0.)
      CALL HBOOK1(nabvoff+1021+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1022+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1023+offset,'DeltaMpipig',1500,9.2,10.7,0.)


      offset = curoff + 11000

      CALL HBOOK1(nabvoff+1001+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1011+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1012+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1013+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1000+offset,'recm2pi $',1000,9.7,10.7,0.)
      CALL HBOOK1(nabvoff+1002+offset,'recmg2pi $',1200,9.1,10.3,0.)
      CALL HBOOK1(nabvoff+1003+offset,'recm2pi-recmg2pi $',1000,0,1,0.)
      CALL HBOOK1(nabvoff+1021+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1022+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1023+offset,'DeltaMpipig',1500,9.2,10.7,0.)


      offset = curoff + 12000

      CALL HBOOK1(nabvoff+1001+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1011+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1012+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1013+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1000+offset,'recm2pi $',1000,9.7,10.7,0.)
      CALL HBOOK1(nabvoff+1002+offset,'recmg2pi $',1200,9.1,10.3,0.)
      CALL HBOOK1(nabvoff+1003+offset,'recm2pi-recmg2pi $',1000,0,1,0.)
      CALL HBOOK1(nabvoff+1021+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1022+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1023+offset,'DeltaMpipig',1500,9.2,10.7,0.)

      offset = curoff + 13000

      CALL HBOOK1(nabvoff+1001+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1011+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1012+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1013+offset,'egboost $',250,.675,.925,0.)
      CALL HBOOK1(nabvoff+1000+offset,'recm2pi $',1000,9.7,10.7,0.)
      CALL HBOOK1(nabvoff+1002+offset,'recmg2pi $',1200,9.1,10.3,0.)
      CALL HBOOK1(nabvoff+1003+offset,'recm2pi-recmg2pi $',1000,0,1,0.)
      CALL HBOOK1(nabvoff+1021+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1022+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1023+offset,'DeltaMpipig',1500,9.2,10.7,0.)




c     2P -> 2S

      offset = curoff + 20000

      CALL HBOOK1(nabvoff+1001+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1011+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1012+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1013+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1000+offset,'recm2pi $',1000,9.7,10.7,0.)
      CALL HBOOK1(nabvoff+1002+offset,'recmg2pi $',1200,9.1,10.3,0.)
      CALL HBOOK1(nabvoff+1003+offset,'recm2pi-recmg2pi $',1000,0,1,0.)
      CALL HBOOK1(nabvoff+1021+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1022+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1023+offset,'DeltaMpipig',1500,9.2,10.7,0.)


      offset = curoff + 21000

      CALL HBOOK1(nabvoff+1001+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1011+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1012+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1013+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1000+offset,'recm2pi $',1000,9.7,10.7,0.)
      CALL HBOOK1(nabvoff+1002+offset,'recmg2pi $',1200,9.1,10.3,0.)
      CALL HBOOK1(nabvoff+1003+offset,'recm2pi-recmg2pi $',1000,0,1,0.)
      CALL HBOOK1(nabvoff+1021+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1022+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1023+offset,'DeltaMpipig',1500,9.2,10.7,0.)

      offset = curoff + 22000

      CALL HBOOK1(nabvoff+1001+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1011+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1012+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1013+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1000+offset,'recm2pi $',1000,9.7,10.7,0.)
      CALL HBOOK1(nabvoff+1002+offset,'recmg2pi $',1200,9.1,10.3,0.)
      CALL HBOOK1(nabvoff+1003+offset,'recm2pi-recmg2pi $',1000,0,1,0.)
      CALL HBOOK1(nabvoff+1021+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1022+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1023+offset,'DeltaMpipig',1500,9.2,10.7,0.)

      offset = curoff + 23000

      CALL HBOOK1(nabvoff+1001+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1011+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1012+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1013+offset,'egboost $',200,.150,.350,0.)
      CALL HBOOK1(nabvoff+1000+offset,'recm2pi $',1000,9.7,10.7,0.)
      CALL HBOOK1(nabvoff+1002+offset,'recmg2pi $',1200,9.1,10.3,0.)
      CALL HBOOK1(nabvoff+1003+offset,'recm2pi-recmg2pi $',1000,0,1,0.)
      CALL HBOOK1(nabvoff+1021+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1022+offset,'DeltaMpipig',1500,9.2,10.7,0.)
      CALL HBOOK1(nabvoff+1023+offset,'DeltaMpipig',1500,9.2,10.7,0.)

 78   continue

      RETURN
      END




